home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Over 1,000 Windows 95 Programs
/
Over 1000 Windows 95 Programs (Microforum) (Disc 1).iso
/
1262
/
foxpro.cf_
/
foxpro.cf
Wrap
Text File
|
1996-03-12
|
3KB
|
207 lines
; -------------------------------------------------------------------------
; ----------- EasyCODE(SPX) - Configuration for FoxPro ------------------
; -------------------------------------------------------------------------
[GenOptions]
InitialIndent=0
CompressBlanks=no
GenFileExt=PRG
MaxIndent=-1
MaxLineLength=-1
[Settings]
SourceFileFormat=ANSI
[ParseOptions]
Parser=easy-xbs.dll
SuppressDoInProcedureCall=yes
SuppressLastReturnInProcedure=yes
[AvailableConstructs]
Statement=yes
If=yes
Switch=yes
Case=no
For=yes
While=yes
Repeat=yes
Loop=yes
Exit=yes
Procedure=yes
Call=yes
Function=yes
Block=yes
Frame=yes
Condition=yes
And=yes
Or=yes
Not=yes
[InsertMenuStrings]
;Statement=
;If=
Switch="D&O CASE"
When=" &CASE"
;Case=
;Of=
;For=
While="DO &WHILE"
;Repeat=
;Loop=
;Exit=
Procedure=&PROCEDURE
Call=DO
Function=F&UNCTION
;Block=
;Frame=
;Condition=
;And=
;Or=
;Not=
[EncloseMenuStrings]
;If=
;Then=
;Else=
Switch="DO &CASE"
When=&CASE
WhenNone=&OTHERWISE
;Case=
;Of=
;Otherwise=
;For=
While="DO &WHILE"
;Repeat=
;Loop=
;Exit=
Procedure=&PROCEDURE
Function=F&UNCTION
;Block=
;Frame=
;Condition=
;And=
;Or=
;Not=
[KeywordStrings]
If=IF
Then=THEN
Else=ELSE
Switch="DO CASE"
;FirstWhen=
When=CASE
WhenNone=OTHERWISE
;Case=
;FirstOf=
;Of=
;Otherwise=
For=FOR
While="DO WHILE"
Repeat=REPEAT
Loop=LOOP
Exit=EXIT
Procedure=PROCEDURE
Function=FUNCTION
;Block=
And=AND
Or=OR
Not=NOT
[MetaStrings]
;SegmentHeader=
;Statement=
;Condition=
;Expression=
;Value=
;ForStatement=
;ProcedureHeader=
;ProcedureCall=
;FunctionHeader=
;BlockComment=
;FrameHeader=
;FrameFooter=
[GenStrings]
Statement=''
EndStatement='\N'
If='\NIF \3+'
ThenBody='\N'
ElseBody='\N\3-ELSE\3+\n'
EmptyElseBody=''
EndIf='\N\3-ENDIF\n'
Switch='\NDO CASE\n\3+'
FirstWhen='\NCASE \5+'
FurtherWhen='\N\3-CASE \5+'
WhenBody='\N\2-'
WhenNoneBody='\N\3-OTHERWISE\n\3+'
EmptyWhenNoneBody='\N'
EndSwitch='\N\6-ENDCASE\n'
; Warning!
; The GenStrings Case, FirstOf, FurtherOf, OfBody,
; OtherwiseBody und EmptyOtherwiseBody are not provided,
; because the CASE construct is not supported by FoxPro.
; Please use the SWITCH construct instead!
; Due to the GenString EndCase you will find the following hint
; in the generated source program:
EndCase='\s\0:\n\nWarning! CASE construct not allowed.\n\n\r'
For='\NFOR \4+'
ForBody='\N\2-'
EndFor='\N\2-ENDFOR\n'
While='\NDO WHILE \9+'
WhileBody='\N\7-'
EndWhile='\N\2-ENDDO\n'
Repeat='\NDO WHILE .T.\n\3+'
Until='\NIF \3+'
EndRepeat='\NEXIT\n\3-ENDIF\n\3-ENDDO\n'
Loop='\NDO WHILE .T.\n\3+'
EndLoop='\N\3-ENDDO\n'
Exit='\NIF \3+'
EndExit='\NEXIT\n\3-ENDIF\n'
Procedure='\NPROCEDURE \10+'
ProcedureBody='\N\7-'
EndProcedure='\N\3-RETURN\n'
Call='\NDO \3+'
EndCall='\n\3-'
Function='\NFUNCTION \9+'
FunctionBody='\N\6-'
EndFunction='\N\3-RETURN\n'
Block='\N* \"\n\i* "'
BlockBody='\N\2+'
EndBlock='\N\2-'
Frame='\N'
FrameBody='\N\3+'
EndFrameBody='\N\3-'
EndFrame='\N'
BeginAnd=' (\7+'
And=');\n\7-.AND. (\7+'
EndAnd=')\7-'
BeginOr=' (\7+'
Or=');\n\7-.OR. (\7+'
EndOr=')\7-'
BeginNot='.NOT. (\7+'
EndNot=')\7-'
Condition=''
EndCondition=''
Segment='\N* \"n\i* "'
SegmentBody='\N\2+'
EndSegment='\N\2-'
TopSegment='* Generated by \%PNAME% V\%PVER% at \%TIME%\n* with \%CFG%\n\n* \"\n* "'
TopSegmentBody='\n\n'
EndTopSegment='\N'